@@ -1,3 +1,7 @@
+Changes for 0.24        Wed Jan 12 13:16:01 GMT 2011
+=====================================================
+* Skip some tests if we are not on a terminal
+
 Changes for 0.22        Fri Jan  7 21:55:38 GMT  2011
 =====================================================
 * Apply blead patch from Peter Acklam

@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:               Term-UI
-version:            0.22
+version:            0.24
 abstract:           User interfaces via Term::ReadLine made easy
 author:
     - Jos Boumans <kane[at]cpan.org>

@@ -11,7 +11,7 @@ use strict;
 BEGIN {
     use vars        qw[$VERSION $AUTOREPLY $VERBOSE $INVALID];
     $VERBOSE    =   1;
-    $VERSION    =   '0.22';
+    $VERSION    =   '0.24';
     $INVALID    =   loc('Invalid selection, please try again: ');
 }
 

@@ -11,6 +11,11 @@ use_ok( 'Term::UI' );
 $Term::UI::AUTOREPLY    = $Term::UI::AUTOREPLY  = 1;
 $Term::UI::VERBOSE      = $Term::UI::VERBOSE    = 0;
 
+# SKIP tests if we aren't on a terminal
+SKIP: {
+
+skip 'not on a terminal', 18 unless -t;
+
 ### enable warnings
 $^W = 1;
 
@@ -142,3 +147,5 @@ my $tmpl = {
         is( $rest, $munged,     "   Command parsed correctly" );
     }
 }
+
+} # End SKIP block